home *** CD-ROM | disk | FTP | other *** search
/ PC Gamer (Italian) 22 / PC Gamer IT CD 22.iso / SPACEBAR / DATA.Z / BAR.WLD < prev    next >
Text File  |  1997-01-30  |  13KB  |  394 lines
  1. // Spacebar demo
  2. START_WLD=INTRO1A_WLD
  3. DISKID=1
  4. SHAREDPAL=$SBARDIR\BAR\CURSORS\NOT.BMP
  5.  
  6. CURSOR 0  = 15 15 $SBARDIR\BAR\CURSORS\NOT.BMP = USESHAREDPAL
  7. CURSOR 1  = 16  1 $SBARDIR\BAR\CURSORS\HUMAN.BMP = USESHAREDPAL
  8. CURSOR 2  =  9  9 $SBARDIR\BAR\CURSORS\ZOOM.BMP = USESHAREDPAL
  9. CURSOR 5  = 16  1 $SBARDIR\BAR\CURSORS\LINK.BMP = USESHAREDPAL
  10. CURSOR 6  = 15 15 $SBARDIR\BAR\CURSORS\WAIT.BMP = USESHAREDPAL
  11. CURSOR 10 =  0  0 $SBARDIR\BAR\CURSORS\EXIT.BMP = USESHAREDPAL
  12. CURSOR 14 =  0 14 $SBARDIR\BAR\CURSORS\LEFT.BMP = USESHAREDPAL
  13. CURSOR 15 = 15  0 $SBARDIR\BAR\CURSORS\UPARROW.BMP = USESHAREDPAL
  14. CURSOR 16 = 31 15 $SBARDIR\BAR\CURSORS\RIGHT.BMP = USESHAREDPAL
  15. CURSOR 17 = 15 31 $SBARDIR\BAR\CURSORS\DOWN.BMP = USESHAREDPAL
  16.  
  17. // Wield Cursors -- removed all but drink & datacart for demo - bar 01-27-97
  18. CURSOR 47 = 17  1 $SBARDIR\BAR\WIELD\bztd.bmp = USESHAREDPAL
  19.  
  20. VAR    TURNCOUNT AS TIMER = 1850   // VAR FOR CURRENT GAME TIME
  21. VAR INBAR = 1
  22. VAR TEMP1 = 0
  23.  
  24. VAR RPEVENT = FALSE                // jwl 11.07.96 used to trigger a rp queue update event
  25. VAR PDAZOOMED = FALSE            // GENERAL USE VAR TO TELL US WHEN PDA IS ZOOMED    
  26. VAR PDAINCREMENT = 11            // HOW MUCH TO INCREMENT THE PDA WHEN ACTIVATING
  27. VAR PDADEACTIVATE = FALSE       // DEACTIVATE THE PDA?
  28.  
  29. // DEMO: Intro storage devices.  First three storage devices
  30. //       provide background info for the game.  Each is a click
  31. //       to continue.  The third one is a link to the entry
  32. //       vestibule.
  33. SDEV INTRO1A_WLD AS CHAT {
  34.     SET BKG=$SBARDIR\GENERAL\TEXT1A.BMP;
  35.     SET ARE=[1,1,635,479]%5{
  36.         LNK=INTRO1B_WLD FADE 3;
  37.     };
  38. }
  39. SDEV INTRO1B_WLD AS CHAT {
  40.     SET BKG=$SBARDIR\GENERAL\TEXT1A.BMP;
  41.     SET BMP=$SBARDIR\GENERAL\TEXT1B.BMP [0,0];
  42.     SET ARE = [1,1,635,479]%5{
  43.         RUN LNK=INTRO1C_WLD FADE 3;
  44.     };
  45. }
  46. SDEV INTRO1C_WLD AS CHAT {
  47.     SET BKG=$SBARDIR\GENERAL\TEXT1A.BMP;
  48.     SET BMP=$SBARDIR\GENERAL\TEXT1C.BMP [0,0];
  49.     SET ARE = [1,1,635,479]%5{
  50.         RUN LNK = BDP_WLD FADE 3;
  51.     };
  52. }
  53.  
  54. // DEMO: Storage device for text2x screen.
  55. //       "There's a lot more than fits in this teeny-weeny demo..."
  56. SDEV TXT2_WLD AS CHAT {
  57.     SET BKG=$SBARDIR\GENERAL\TEXT2.BMP;
  58.     SET ARE = [0, 0, 80, 480] %10{
  59.         RUN COMMAND = CLOSE;
  60.     }
  61. }
  62.  
  63. // DEMO: Storage device for text3 screen.
  64. //       "There's a lot more of this flashback..."
  65. SDEV TXT3_WLD AS CHAT {
  66.     SET BKG=$SBARDIR\GENERAL\TEXT3.BMP;
  67. }
  68.  
  69. // DEMO: Removed the entry vestibule.
  70. // BAR AREA
  71. SDEV BDP_WLD{
  72.     SET BKG=$SBARDIR\BAR\PAN\BDP.BMP;
  73.     RUN EXPR=BARLOC(BDP);
  74.     RUN EXPR=BARCROWD~~VOLUME(8);
  75.     RUN EXPR=BARMUSIC~~VOLUME(10);
  76.  
  77.     //     Link to Outside Howdy Saloon
  78.     //
  79.     // DEMO: Replaced link to outside the saloon with a link to
  80.     //       to a "far as you can go" screen.
  81.     SET ARE=[237,185,315,301]%5{
  82.         RUN LNK = BDP_WLD~~TXT2_WLD
  83.     };
  84.  
  85.     // DEMO: Replace link to the gambling hall with a "far as you can go" screen.
  86.     SET LNK=BDP_WLD~~TXT2_WLD[105,179,208,341]@[900,130];
  87.  
  88.     // Link to The Lily Pad
  89.     // DEMO: Replaced link to the lily pad with a link to
  90.     //       "far as you can go" screen.
  91.     SET ARE = LILY [409,187,501,307]%5{
  92.         RUN LNK = BDP_WLD~~TXT2_WLD
  93.     };
  94.  
  95.     // Link to Dance Floor
  96.     // DEMO: Replaced link to the dance floor with a link to
  97.     //       "far as you can go" screen.
  98.     SET LNK=BDP_WLD~~TXT2_WLD[1258,207,1460,323]@[878,75];
  99.  
  100.     // Link to Entry Vestibule
  101.     SET LNK=BDP_WLD~~TXT2_WLD[686,199,766,276]@[660,125];
  102.  
  103.     // Link Bar Computer
  104.     SET LNK=BDP_WLD~~TXT2_WLD[8,248,85,360]%2;
  105.  
  106.     // Drinkmaster
  107.     SET ARE=DRINKMASTER[824,172,956,300]%2{
  108.         RUN LNK = SOLDIER_WLD;
  109.     };
  110.     // Soldier 714
  111.         SET CHR=$SBARDIR\GENERAL\PANIMS\BDSO1.SMK[874,196]%2{
  112.         RUN LNK = SOLDIER_WLD;
  113.     };
  114.     IF (SOLDIER_MET == 1)
  115.         // Only play Zelda's line if you didn't flash back w/Soldier bar 11/27/96
  116.         IF (ZFLASHBACK == 0)
  117.                 RUN MOVIE=$SBARDIR\BAR\EVENTS\EVZESO.SMK[97,292] AS PDAMSG DONTOVERRIDE DONTINCREMENT;
  118.             RUN EXPR=SOLDIER_MET(2);
  119.         ENDIF
  120.     ENDIF
  121.  
  122.     // Thud and Fleebix
  123.     SET ARE=THUDANDFLEEB[1150,242,1256,360]%2{
  124.         IF (TBHIDE == TRUE)
  125.             // DEMO: Remove Thud hide support.
  126.             RUN COMMAND = INSERT OBJECT FBTHMOVIE TO FLEETHUD_WLD;
  127.             RUN EXPR = FBTHMOVIE~~MODAL( 0 );
  128.             RUN EXPR = FBTHMOVIE~~LOOP( -1 );
  129.             RUN EXPR = TBHIDECOUNT( 0 );
  130.             RUN EXPR = TBHIDE( FALSE );
  131.         ENDIF
  132.         RUN LNK = FLEETHUD_WLD AS CLOSEUP;
  133.     };
  134.         // Thud
  135.         SET CHR=$SBARDIR\GENERAL\PANIMS\BDTB1.SMK[1150,254]%2{
  136.         IF (TBHIDE == TRUE)
  137.             // DEMO: Remove Thud hide support.
  138.             RUN COMMAND = INSERT OBJECT FBTHMOVIE TO FLEETHUD_WLD;
  139.             RUN EXPR = FBTHMOVIE~~MODAL( 0 );
  140.             RUN EXPR = FBTHMOVIE~~LOOP( -1 );
  141.             RUN EXPR = TBHIDECOUNT( 0 );
  142.             RUN EXPR = TBHIDE( FALSE );
  143.         ENDIF
  144.         RUN LNK = FLEETHUD_WLD AS CLOSEUP;
  145.     };
  146.     
  147.     IF (THUD_GREET == TRUE)
  148.         IF (THUD_MET == 0)
  149.             // only have Zelda make the comment if Thud was last one speaking in CIC
  150.             IF (THUDLAST == TRUE)
  151.                 RUN MOVIE=$SBARDIR\BAR\EVENTS\EVZETH.SMK[97,292] AS PDAMSG DONTOVERRIDE DONTINCREMENT;
  152.                 RUN EXPR=THUD_MET(2);
  153.             ENDIF
  154.         ENDIF
  155.     ENDIF
  156.  
  157.     // DEMO: Add the Mytosi panimation without a link
  158.     SET CHR=$SBARDIR\GENERAL\PANIMS\BDMY1.SMK[712,260];
  159.  
  160.     // DEMO: Removed link to mydw_wld when sararrive_evt is eq to 6666
  161.     // PAKSHA STANDING IN DINING AREA
  162.     //    SET CHR=$SBARDIR\GENERAL\PANIMS\BDPK1.SMK[1636,226];
  163.  
  164.         // CIGARETTE SMOKE
  165.         SET CHR=$SBARDIR\GENERAL\PANIMS\BDNC2.SMK[1084,246];
  166.  
  167.         // MOTHS SITTING AT TABLE
  168.         SET CHR=$SBARDIR\GENERAL\PANIMS\BDMO1.SMK[1640,218];
  169.  
  170.     // DEMO: Removed link to mydw_wld and dwelf sitting at bar if sararrive_evt eq 6666
  171.         // BAND PLAYING WITHOUT BANDLEADER
  172.         SET CHR=$SBARDIR\GENERAL\PANIMS\BDBD1.SMK[1298,236];
  173.  
  174.     // CHECK TO SEE IF THE BANDLEADER SHOULD STILL BE AROUND
  175.         SET CHR=$SBARDIR\GENERAL\PANIMS\BDBL1.SMK[1334,242]; // BANDLEADER
  176.  
  177.         // Cilia (seen from Bar)
  178.        SET CHR=$SBARDIR\GENERAL\PANIMS\BDCI1.SMK[1372,242];
  179.  
  180.        // SRAFFAN LOOKING OUT WINDOW
  181.        SET CHR=$SBARDIR\GENERAL\PANIMS\BDNC3.SMK[1438,252];
  182.  
  183.     // DEMO: Removed the catwalk
  184.     // DEMO: Removed the three spaceport windows.
  185. }
  186. // Soldier CIC
  187. SDEV SOLDIER_WLD AS CIC{
  188.     SET BKG = $SBARDIR\BAR\CHAR\SOLDIER\BLACK.BMP;
  189.     SET CHR = $SBARDIR\BAR\CHAR\SOLDIER\SONEUTR2.SMK^SOLDMOVIE [80,0] %0;
  190.  
  191.     // Mister Drinkmaster 2000
  192.     SET ARE=BDNP[80,82,247,216]%1{
  193.         SET TXT = Mister_DrinkMaster_2000 COLOR 2 AS TITLE; //%%9860
  194.         SET BMP=$SBARDIR\GENERAL\MENUS\EXAMINE.BMP{
  195.             RUN SND=$SBARDIR\BAR\CHAR\SOLDIER\BDNPEXC1.WAV AS QUEUE *2;
  196.         };
  197.         // DEMO: Removed turnon interaction.
  198.         SET BMP=$SBARDIR\GENERAL\MENUS\OPEN.BMP{
  199.             RUN COMMAND = FLUSHQUEUE2;
  200.             RUN MOVIE=$SBARDIR\BAR\CHAR\SOLDIER\BDNPOPC1.SMK;
  201.         };
  202.         // DEMO: Removed search interaction.
  203.     };
  204.     // DEMO: Removed link to brooch as you can't complete the zzazzl flashback
  205.     SET ARE= [245,110,385,340] %1 {
  206.         SET TXT=Soldier_714-Z-367 COLOR 2 SIZE 16 AS TITLE; //%%9896
  207.         SET BMP=$SBARDIR\GENERAL\MENUS\EXAMINE.BMP{
  208.             RUN SND=$SBARDIR\BAR\CHAR\SOLDIER\SOOSEX.WAV AS QUEUE *2;
  209.         };
  210. //        IF (SOLDIER_GREET == FALSE)
  211.              SET BMP=$SBARDIR\GENERAL\MENUS\GREET.BMP{
  212.                 RUN EXPR = SOLDMOVIE~~MODAL( 1 );
  213.                 RUN EXPR = SOLDMOVIE~~LOOP( 1 );
  214.                 RUN COMMAND = FLUSHQUEUE2;
  215.                    RUN MOVIE=$SBARDIR\BAR\CHAR\SOLDIER\SOOSGR.SMK;
  216.                 RUN EXPR = SOLDMOVIE~~MODAL( 0 );
  217.                 RUN EXPR = SOLDMOVIE~~LOOP( -1 );
  218.  
  219.                 RUN COMMAND = INSERT OBJECT SOLDIER TO LOG_WLD;
  220.                 RUN EXPR=SOLDIER~~ROOM(4);
  221.                 RUN EXPR=SOLDIERZ~~ROOM(4);
  222.                 // DEMO: Removed voiceprinter and infrared jammer code.
  223.                    RUN EXPR=SOLDIER_GREET(TRUE);
  224.             };
  225.  //        ENDIF
  226.         // DEMO: Removed ask interaction.
  227.         // DEMO: Removed order interaction.
  228.         // DEMO: Removed chat interaction.
  229.     };
  230.     // DEMO: Removed your_drink - BDTO3.BMP^DRINK3 - bar 01-22-97
  231. }
  232.  
  233. // Fleebix & Thud CIC
  234. SDEV FLEETHUD_WLD AS CIC{
  235.     SET BKG=$SBARDIR\BAR\CHAR\THUD\BLACK.BMP;
  236.     SET CHR = $SBARDIR\BAR\CHAR\THUD\TBNEUTR1.SMK^FBTHMOVIE [80,0] %0;
  237.     // DEMO: Remove Thud's hide loop.
  238.  
  239.     // DEMO: Removed support to make thud hide.
  240.     SET ARE= [150,155,250,310]^FLEEBIX %1 {
  241.         SET TXT=Fleebix COLOR 2 SIZE 16 AS TITLE; //%%9030
  242.         SET BMP=$SBARDIR\GENERAL\MENUS\EXAMINE.BMP{
  243.             RUN SND=$SBARDIR\BAR\CHAR\FLEEBIX\FBOSEX.WAV AS QUEUE *2;
  244.         };
  245.         // DEMO: Removed smell interaction.
  246. //        IF (FLEEB_GREET == FALSE )
  247.             SET BMP=$SBARDIR\GENERAL\MENUS\GREET.BMP{
  248.                 RUN EXPR = FBTHMOVIE~~MODAL( 1 );
  249.                 RUN EXPR = FBTHMOVIE~~LOOP( 1 );
  250.                 RUN COMMAND = FLUSHQUEUE2;
  251.                 RUN MOVIE=$SBARDIR\BAR\CHAR\FLEEBIX\FBOSGR.SMK;
  252.                 RUN EXPR = FBTHMOVIE~~MODAL( 0 );
  253.                 RUN EXPR = FBTHMOVIE~~LOOP( -1 );
  254.                 RUN COMMAND = INSERT OBJECT FLEEBIX TO LOG_WLD;
  255.                 // DEMO: Removed voiceprinter and ir jammer support.
  256.                 RUN EXPR = THUDLAST( FALSE );
  257.                 RUN EXPR = FLEEB_GREET( TRUE );
  258.             };
  259.             // DEMO: Removed ask interaction
  260.             // DEMO: Removed chat because it gets to the neblitz flashback.  That's not part of the demo.
  261. //        ENDIF
  262.     };
  263.  
  264.     SET ARE= [350,135,545,359] %1 {
  265.         SET TXT=Thud COLOR 2 SIZE 16 AS TITLE; //%%9528
  266.         SET BMP=$SBARDIR\GENERAL\MENUS\EXAMINE.BMP{
  267.             RUN SND=$SBARDIR\BAR\CHAR\THUD\TBOSEX.WAV AS QUEUE *2;
  268.         };
  269.         // DEMO: Removed kiss interaction.
  270.         // DEMO: Removed smell interaction.
  271. //        IF (THUD_GREET == FALSE)
  272.             SET BMP=$SBARDIR\GENERAL\MENUS\GREET.BMP{
  273.                 RUN EXPR = FBTHMOVIE~~MODAL( 1 );
  274.                 RUN EXPR = FBTHMOVIE~~LOOP( 1 );
  275.                 RUN COMMAND = FLUSHQUEUE2;
  276.                 RUN MOVIE=$SBARDIR\BAR\CHAR\THUD\TBOSGR.SMK;
  277.                 RUN EXPR = FBTHMOVIE~~MODAL( 0 );
  278.                 RUN EXPR = FBTHMOVIE~~LOOP( -1 );
  279.                 
  280.                 RUN COMMAND = INSERT OBJECT THUD TO LOG_WLD;
  281.                 // DEMO: Removed voiceprinter and ir jammer support.
  282.                 RUN EXPR = THUDLAST( TRUE );
  283.                 RUN EXPR = THUD_GREET( TRUE );
  284.             };
  285. //        ENDIF
  286.     };
  287. }
  288. // End Fleebix & Thud CIC
  289. // DEMO: Removed mydw_wld
  290.  
  291. SDEV BPDA_WLD AS PDA{
  292.     SET BKG=$SBARDIR\BAR\PDA\BPDA.BMP;
  293.     SET ARE=DEACTIVE[0,0,514,238]{
  294.         RUN COMMAND = DEACTIVATEPDA;
  295.     };
  296.     SET BUT=$SBARDIR\BAR\PDA\BMAP.BMP[123,188]+1^100;
  297.     SET BUT=$SBARDIR\BAR\PDA\BSTASH.BMP[165,188]+1^101;
  298.     // Zoomlite unnecessary
  299. //    SET BUT=$SBARDIR\BAR\PDA\ZOOMLITE.BMP[208,187]+2^ZOOMFLASH FRAMERATE 4;
  300.     // DEMO: Disabled the zoom button -- click brings up text. - bar 01-27-96
  301.     SET BUT=$SBARDIR\BAR\PDA\BZOOM.BMP[208,187]+2^102 {
  302.         SET TXT = $SBARDIR\GENERAL\NOTINCL.TXT COLOR 2 AS CAPTION;
  303.     };
  304.     SET BUT=$SBARDIR\BAR\PDA\BSYSTEM.BMP[262,188]+1^103 {
  305.         SET TXT = $SBARDIR\GENERAL\NOTINCL.TXT COLOR 2 AS CAPTION;
  306.     };
  307.     // DEMO: Disabled the PDA log button.
  308.     SET BUT=$SBARDIR\BAR\PDA\BLOG.BMP[304,188]+1^114 {
  309.         SET TXT = $SBARDIR\GENERAL\NOTINCL.TXT COLOR 2 AS CAPTION;
  310.     };
  311.     SET CHR=$SBARDIR\BAR\PDA\BWAND.SMK^WANDANIM LOOP 0[41,8];
  312.     SET BUT=$SBARDIR\BAR\PDA\BBLINK.BMP[361,133]^110^MSGLIGHT+2{
  313.         RUN EXPR=ZELDA_REM(6666);
  314.     }
  315.     SET TIME=$SBARDIR\BAR\PDA\BTIME.BMP[410,140]^CLOCK+11 VALUE TURNCOUNT;
  316.     SET SPR=$SBARDIR\BAR\MAP\NAMES\BD.BMP[377,82];        
  317. }
  318.  
  319. SDEV MAP_WLD AS BMP RECT [116, 61, 350, 172]{
  320.     SET BKG=$SBARDIR\BAR\MAP\BARMAP.BMP;
  321.     // THE YOU ICON
  322.     SET SPR=$SBARDIR\BAR\MAP\YOU.BMP[57,52]+2;
  323. }
  324. SDEV INV_WLD AS INVWLD RECT [116, 61, 350, 172]{
  325.     SET BKG=$SBARDIR\BAR\INV\INVBACK.BMP;
  326.     // DATACART
  327.     SET BMP=$SBARDIR\BAR\INV\BZTD.BMP^DATACART{
  328.         SET TXT = datacart COLOR 2 AS TITLE; //%%2950
  329.         SET BMP=$SBARDIR\GENERAL\MENUS\EXAMINE.BMP{
  330.             RUN SND=$SBARDIR\BAR\OBJ\BZTDEXC1.WAV AS QUEUE *2;
  331.         };
  332.         SET BMP=$SBARDIR\GENERAL\MENUS\PICKUP.BMP{
  333.             RUN COMMAND=TRANSFER OBJECT DATACART FROM INV_WLD TO BWIELD_WLD;
  334.         };
  335.     };
  336. }
  337. SDEV BWIELD_WLD AS WIELD{
  338.     BKG=$SBARDIR\BAR\WIELD\HUMYOU2.BMP;
  339.     SET ARE = [0,0,100,100] {
  340.         SET TXT =Alias_Node COLOR 2 SIZE 16 AS TITLE; //%%135
  341.         SET BMP=$SBARDIR\GENERAL\MENUS\WAIT.BMP {
  342.             RUN SND = $SBARDIR\GENERAL\WAIT.WAV; 
  343.             RUN COMMAND = EVENTLOOP;
  344.             RUN COMMAND = UPDATE;
  345.         };
  346.     };
  347.     // DATACART
  348.     HOLD BMP=$SBARDIR\BAR\WIELD\BZTD.BMP^DATACART #47{
  349.         SET TXT = datacart COLOR 2 AS TITLE; //%%2251
  350.         SET BMP=$SBARDIR\GENERAL\MENUS\EXAMINE.BMP{
  351.             RUN SND=$SBARDIR\BAR\OBJ\BZTDEXC1.WAV AS QUEUE *2;
  352.         };
  353.           SET BMP=$SBARDIR\GENERAL\MENUS\STASH.BMP{
  354.             RUN COMMAND=TRANSFER OBJECT DATACART FROM BWIELD_WLD TO INV_WLD;
  355.             RUN EXPR=DC_DART_EVT(6666);
  356.         };
  357.     };
  358.     // DEMO: Removed the high frequency jammer
  359. }
  360. SDEV MOO_WLD AS MOOWLD RECT [116, 61, 350, 172]{
  361.     SET BKG=$SBARDIR\BAR\INV\INVBACK.BMP;
  362. }
  363.  
  364. SDEV EVT_WLD AS EVENT{
  365.     IF (BARCROWD~~PLAYING == 0)
  366.             RUN EXPR=BARCROWD~~VOLUME(0);
  367.         RUN SND=$SBARDIR\BAR\EVENTS\BARBREAK.WAV^BARCROWD LOOP 1999999 AS MIX IS TIMELESS SOUNDOVEROK; 
  368.     ENDIF
  369.     IF (BARMUSIC~~PLAYING == 0)
  370.             RUN SND=$SBARDIR\BAR\EVENTS\BARBAND1.MID^BARMUSIC LOOP 2 AS MIDI IS TIMELESS;
  371.     ENDIF
  372.  
  373.     // BULBUS FLIGHT DELAYED TO 22:90
  374.     IF ( FLIGHT_MSG==1 AND TURNCOUNT > 1855 )
  375.         RUN SND=$SBARDIR\BAR\EVENTS\EVFLA5.WAV AS QUEUE *1 SOUNDOVEROK VOLUME 7;
  376.         RUN EXPR=FLIGHT_MSG(2);
  377.     ENDIF
  378. }
  379.  
  380. //SDEV LOG_WLD AS LOG RECT [116, 61, 350, 172] {
  381. //    SET BKG=$SBARDIR\BAR\INV\INVBACK.BMP;
  382. //}
  383. SDEV TURN_WLD AS TURNEVENT {
  384.     IF (TURNCOUNT == ENDTURN)
  385.         RUN EXPR = TURNCOUNT( STARTTURN );
  386.     ENDIF
  387.  
  388.     // BULBUS FLIGHT DELAYED TO 22:90
  389.     IF ( FLIGHT_MSG==1 AND TURNCOUNT > 1855 )
  390.         RUN SND=$SBARDIR\BAR\EVENTS\EVFLA5.WAV AS QUEUE *1 SOUNDOVEROK VOLUME 7;
  391.         RUN EXPR=FLIGHT_MSG(2);
  392.     ENDIF
  393. }
  394.